HyperLib 1997 Winter - Disc 1/HYPERLIB-1997-Winter-CD1.ISO.7z/HYPERLIB-1997-Winter-CD1.ISO/オンラインウェア/PRG/MacPerl 506 appl folder.sit/MacPerl 506 appl folder/Mac_Perl_506r1m_appl/lib/auto/POSIX/waitpid.al

Text File | 1995-08-04 | 241b | 12 lines

# NOTE: Derived from :::lib:POSIX.pm.  Changes made here will be lost.
package POSIX;

sub waitpid {
    usage "waitpid(pid, statusvariable, options)" if @_ != 3;
    local $result = waitpid($_[0], $_[2]);
    $_[1] = $?;
    $result;
}

1;